[LegacyColorValue = true]; 

{ TSMDemandIndex: Sibbett's Demand Index
  Copyright 1998-1999, PJ Kaufman. All rights reserved } 

   inputs: length(10);

   plot1(TSMDemandIndex(length), "TSMDemand");
 